' Tie-Bot 6

cond
*.eye2 *.eye8 !=
start
*.eye2 *.eye8 sub .aimsx store
stop

cond
*.eye4 *.eye6 !=
start
*.eye4 *.eye6 sub 2 div .aimsx store
stop

cond
*.refeye 10 =
start
200 .aimsx store
stop

cond
*.vel 40 <
*.refeye 10 !=
start
40 *.vel sub .up store
stop

cond 
*.nrg 4000 >
start
50 .repro store
stop

cond
*.eye5 30 >
*.refeye 10 !=
start
1 .tie store
stop

cond
*.numties 0 >
start
-1 .tieloc store
-1000 .tieval store
1 .tienum store
stop

cond
*.eye5 50 >
start
-1 .shoot store
stop

end
